﻿Imports System
Imports System.Reflection
Imports System.Runtime.InteropServices

' Les informations générales relatives à un assembly dépendent de 
' l'ensemble d'attributs suivant. Changez les valeurs de ces attributs pour modifier les informations
' associées à un assembly.

' Passez en revue les valeurs des attributs de l'assembly

<Assembly: AssemblyTitle("OMANE.Modules.TauxGarantis")> 
<Assembly: AssemblyDescription("")> 
<Assembly: AssemblyCompany("Natixis Assurances")> 
<Assembly: AssemblyProduct("OMANE.Modules.TauxGarantis")> 
<Assembly: AssemblyCopyright("Copyright © Microsoft 2011")> 
<Assembly: AssemblyTrademark("")> 

<Assembly: ComVisible(False)>

'Le GUID suivant est pour l'ID de la typelib si ce projet est exposé à COM
<Assembly: Guid("8d2c0ab0-5e4c-4353-b824-6fce038d4042")> 

' Les informations de version pour un assembly se composent des quatre valeurs suivantes :
'
'      Version principale
'      Version secondaire 
'      Numéro de build
'      Révision
'
' Vous pouvez spécifier toutes les valeurs ou indiquer les numéros de build et de révision par défaut 
' en utilisant '*', comme indiqué ci-dessous :
' <Assembly: AssemblyVersion("1.0.*")> 

<Assembly: AssemblyVersion("1.0.0.0")> 
<Assembly: AssemblyFileVersion("1.0.0.0")> 
<Assembly: OMANE.Common.EntryPoint(GetType(ModuleTauxGaranti))> 

''''''''''''''''''''''''''''''' DEPLACER DEPUIS INITILISATION PAR L'EXECUTABLE DE MANIERE EXPLICITE ''''''''''''''''''''''''
' L'objectif est de pouvoir accelerer le lancement de l'outil en l'absence du module taux garantis'''''''''''''
'Dim UniversOMANE As IModelOMANE = New Model.ModelOMANE()
'serviceNames.Add("_api_UniversService_", GetType(IModelOMANE))
'serviceTypes.Add(GetType(IModelOMANE))
'singleton.Add(GetType(IModelOMANE), UniversOMANE)
'Try
'    UniversOMANE.Initialize()
'Catch ex As Exception
'    IO.File.AppendAllText("log3.txt", _
' "[DEBUT]" & vbCrLf & _
' "Une erreur SAS s'est produite lors de l'initialisation de l'univers OMANE" & vbCrLf & _
' "[FIN]" & vbCrLf)
'End Try
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
<Assembly: OMANE.Common.DeclareService(GetType(OMANE.Common.Model.Interfaces.IModelOMANE), GetType(OMANE.Common.Model.ModelOMANE))> 
